Возвращает объект CommandBarEvents. Только для чтения.

Значения
Аргумент, передаваемый в свойство CommandBarEvents, имеет вид:

Аргумент		Описание
элементVB		Должен представлять объект типа CommandBarControl.

Дополнительные сведения
Свойство CommandBarEvents используют для возвращения объекта-источника события, который запускает событие при нажатии кнопки на панели инструментов. Аргумент, передаваемый в свойство CommandBarEvents, должен представлять элемент управления панели инструментов, для которого генерируется событие нажатия кнопки.

Пример

В данном примере приводится программа, использующая свойство CommandBarEvents. Это свойство применяется в программах для обработки нажатия кнопки мыши в панели команд.

Private WithEvents ce As CommandBarEvents

Sub Test()
    Dim c As CommandBarControl
    Set c = Application.VBE.CommandBars("Сервис").Controls(1)
    Set ce = Application.VBE.Events.CommandBarEvents(c)
End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)
    ' Место для программы обработки событий.
End Sub

Свойство CommandBarEvents